home *** CD-ROM | disk | FTP | other *** search
- object frmMain: TfrmMain
- Left = 62
- Top = 124
- Width = 144
- Height = 154
- BorderStyle = bsSizeToolWin
- Caption = 'X Translator 5'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = False
- OnActivate = FormActivate
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnResize = FormResize
- PixelsPerInch = 96
- TextHeight = 13
- object panelPodklad4: TPanel
- Left = 0
- Top = 0
- Width = 136
- Height = 120
- Align = alClient
- BevelOuter = bvNone
- Caption = 'panelPodklad4'
- TabOrder = 0
- object panelSlovo: TPanel
- Left = 0
- Top = 0
- Width = 136
- Height = 25
- Align = alTop
- BevelOuter = bvNone
- Caption = 'panelSlovo'
- TabOrder = 0
- object panelSlovo2: TPanel
- Left = 0
- Top = 0
- Width = 136
- Height = 25
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object editSlovo: TEdit
- Left = 2
- Top = 2
- Width = 51
- Height = 20
- Ctl3D = False
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 0
- OnChange = editSlovoChange
- OnKeyDown = editSlovoKeyDown
- end
- object ComboBoxSlovnik: TComboBox
- Left = 57
- Top = 2
- Width = 60
- Height = 21
- Ctl3D = True
- ItemHeight = 13
- ParentCtl3D = False
- Sorted = True
- TabOrder = 1
- Text = 'Slovn�k'
- OnChange = ComboBoxSlovnikChange
- end
- object checkBoxTop: TCheckBox
- Left = 120
- Top = 4
- Width = 16
- Height = 17
- Hint =
- 'Za�krtnut�m tla��tka bud okno z�st�vat v�dy nad ostatn�mi okny, ' +
- 'tak�e bude v�dy vid�t. Neza�krtl� tla��tko funkci vypne.'
- Checked = True
- Ctl3D = True
- ParentCtl3D = False
- ParentShowHint = False
- ShowHint = True
- State = cbChecked
- TabOrder = 2
- OnClick = checkBoxTopClick
- end
- end
- end
- object panelPodklad5: TPanel
- Left = 0
- Top = 25
- Width = 136
- Height = 95
- Align = alClient
- BevelOuter = bvNone
- Caption = 'panelPodklad5'
- TabOrder = 1
- OnResize = panelPodklad5Resize
- object panelVyznam: TPanel
- Left = 0
- Top = 0
- Width = 136
- Height = 95
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object Edit1: TEdit
- Left = 416
- Top = 256
- Width = 9
- Height = 21
- TabOrder = 0
- Text = 'Edit1'
- Visible = False
- end
- object panelPodklad1: TPanel
- Left = 0
- Top = 75
- Width = 136
- Height = 20
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 1
- object btnPreklad: TButton
- Left = 0
- Top = 0
- Width = 57
- Height = 21
- Caption = 'P�eklad'
- TabOrder = 0
- OnClick = btnPrekladClick
- end
- object btnSeznam: TButton
- Left = 56
- Top = 0
- Width = 81
- Height = 21
- Caption = 'Seznam slov'
- TabOrder = 1
- OnClick = btnSeznamClick
- end
- end
- object panelSeznam: TPanel
- Left = 0
- Top = 0
- Width = 136
- Height = 41
- Align = alTop
- BevelOuter = bvNone
- Caption = 'panelSeznam'
- TabOrder = 2
- OnResize = panelSeznamResize
- object stringGridSeznam: TStringGrid
- Left = 0
- Top = 0
- Width = 136
- Height = 25
- Align = alClient
- BorderStyle = bsNone
- Color = 15262941
- ColCount = 1
- DefaultColWidth = 170
- DefaultRowHeight = 16
- FixedCols = 0
- RowCount = 1
- FixedRows = 0
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- Options = []
- ParentFont = False
- ScrollBars = ssVertical
- TabOrder = 0
- OnDblClick = stringGridSeznamDblClick
- OnKeyDown = stringGridSeznamKeyDown
- end
- object panelNalezeno: TPanel
- Left = 0
- Top = 25
- Width = 136
- Height = 16
- Hint = 'Po�et nalezen�ch slov, kter� za��naj� zadan�mi p�smeny'
- Align = alBottom
- Caption = 'X Translator 5'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- end
- end
- object panelPodklad2: TPanel
- Left = 0
- Top = 41
- Width = 136
- Height = 34
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 3
- object editPreklad: TRichEdit
- Left = 0
- Top = 0
- Width = 136
- Height = 34
- Align = alClient
- BorderStyle = bsNone
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- OnResizeRequest = editPrekladResizeRequest
- end
- end
- end
- end
- end
- object Timer1: TTimer
- Interval = 50
- OnTimer = Timer1Timer
- Left = 100
- Top = 65
- end
- end
-